unit uFormer;

interface
Uses Classes,Forms;
Procedure FormTrigger(var ClassRef: TFormClass;i:integer);

implementation
uses DBinv, Splash, ArmDet, UserMenu, Clients, Deals, Trips, Ferrymans, SysDic,
     Agreement, Enter, DetiView, ClientsEdit, AddServices, Raspred_class,
     PaymentsView, BankExchange, raspred_misc, PodotchCommon, Old_Podotch, JL,
     Vizit, WorkDays, VizitStat, RenderingService, DopPodrView, StaffNeeddoc,
     StaffDoc, GoogleMap, ControlLesson, OfficialNote, ReturnFood, Request,
     UserPermissions, Request_otkaz, RegRequest, RequestGPChange, Rejim,
     DopUslTariffs, InsideRequest, TemplateLesson, Doljnost, Marketing,
     Kitchen, DocsReg, UchebKurs, CheckPodrazd, Food, FoodMenu, FoodPortion,
     FoodFactor, RequestAnswers, FoodFlowRate, VybyvshieDeti, SCApproving,
     TimeSheets, DoljnostFood, MoscowKids, ClassJournal, Vacation, Visitors;


Procedure FormTrigger(var ClassRef: TFormClass;i:integer);
begin
  case i of
     1:ClassRef:=TfmArmDet;
     2:ClassRef:=TfmUserMenu;
     3:ClassRef:=TfmClients;
     4:ClassRef:=TfmAgreement;
     5:ClassRef:=TfmEnter;
     7:ClassRef:=TfmSysDic;
     8:ClassRef:=TfmDetiView;
     9:ClassRef:=TfmClientsEdit;
    10:ClassRef:=TfmAddServices;
    11:ClassRef:=TfmRaspred_class;
    12:ClassRef:=TfmPaymentsView;
    14:ClassRef:=TfmBankExchange;
    15:ClassRef:=Tfmraspred_misc;
    16:ClassRef:=TfmPodotchCommon;
    17:ClassRef:=TfmOld_Podotch;
    18:ClassRef:=TfmJL;
    19:ClassRef:=TfmVizit;
    20:ClassRef:=TfmWorkDays;
    21:ClassRef:=TfmVizitStat;
    22:ClassRef:=TfmRenderingService;
    23:ClassRef:=TfmStaffNeeddoc;
    24:ClassRef:=TfmStaffDoc;
    25:ClassRef:=TfmDopPodrView;
    26:ClassRef:=TfmGoogleMap;
    27:ClassRef:=TfmControlLesson;
    28:ClassRef:=TfmOfficialNote;
    29:ClassRef:=TfmReturnFood;
    31:ClassRef:=TfmRequest;
    32:ClassRef:=TfmUserPermissions;
    33:ClassRef:=TfmRequest_otkaz;
    34:ClassRef:=TfmRegRequest;
    35:ClassRef:=TfmRequestGPChange;
    36:ClassRef:=TfmRejim;
    37:ClassRef:=TfmDopUslTariffs;
    38:ClassRef:=TfmInsideRequest;
    39:ClassRef:=TfmTemplateLesson;
    40:ClassRef:=TfmDoljnost;
    41:ClassRef:=TfmMarketing;
    42:ClassRef:=TfmKitchen;
    43:ClassRef:=TfmDocsReg;
    44:ClassRef:=TfmUchebKurs;
    45:ClassRef:=TfmCheckPodrazd;
    46:ClassRef:=TfmFood;
    47:ClassRef:=TfmFoodMenu;
    48:ClassRef:=TfmFoodPortion;
    49:ClassRef:=TfmFoodFactor;
    50:ClassRef:=TfmFoodFlowRate;
    51:ClassRef:=TfmRequestAnswers;
    52:ClassRef:=TfmVybyvshieDeti;
    53:ClassRef:=TfmSCApproving;
    54:ClassRef:=TfmTimeSheets;
    55:ClassRef:=TfmDoljnostFood;
    56:ClassRef:=TfmMoscowKids;
    57:ClassRef:=TfmClassJournal;
    58:ClassRef:=TfmVacation;
    59:ClassRef:=TfmVisitors;
  else
    ClassRef:=TfmSplash;
  end;
end;

end.
